home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / libcalls / amigaguide.inc next >
Text File  |  1998-06-24  |  4KB  |  204 lines
  1. pattern amigaguidePrivate1 is
  2.     push a6;
  3.     a6:=AmigaGuideBase; jsr [a6-30];
  4.     pop a6;
  5. endp;                                                            # AMIGAGUIDEPRIVATE1
  6.  
  7. pattern LockAmigaGuideBase(_handle) is
  8.     push a6;
  9.     a0:=_handle;
  10.     a6:=AmigaGuideBase; jsr [a6-36];
  11.     pop a6;
  12. endp;                                                            # LOCKAMIGAGUIDEBASE
  13.  
  14. pattern UnlockAmigaGuideBase(_key) is
  15.     push a6;
  16.     d0.l:=_key;
  17.     a6:=AmigaGuideBase; jsr [a6-42];
  18.     pop a6;
  19. endp;                                                            # UNLOCKAMIGAGUIDEBASE
  20.  
  21. pattern amigaguidePrivate2 is
  22.     push a6;
  23.     a6:=AmigaGuideBase; jsr [a6-48];
  24.     pop a6;
  25. endp;                                                            # AMIGAGUIDEPRIVATE2
  26.  
  27. pattern OpenAmigaGuideA(_nag,_attrs) is
  28.     push a6;
  29.     safe a0:=_nag; a1:=_attrs;;
  30.     a6:=AmigaGuideBase; jsr [a6-54];
  31.     pop a6;
  32. endp;                                                            # OPENAMIGAGUIDEA
  33.  
  34. pattern OpenAmigaGuideAsyncA(_nag,_attrs) is
  35.     push a6;
  36.     safe a0:=_nag; d0.l:=_attrs;;
  37.     a6:=AmigaGuideBase; jsr [a6-60];
  38.     pop a6;
  39. endp;                                                            # OPENAMIGAGUIDEASYNCA
  40.  
  41. pattern CloseAmigaGuide(_cl) is
  42.     push a6;
  43.     a0:=_cl;
  44.     a6:=AmigaGuideBase; jsr [a6-66];
  45.     pop a6;
  46. endp;                                                            # CLOSEAMIGAGUIDE
  47.  
  48. pattern AmigaGuideSignal(_cl) is
  49.     push a6;
  50.     a0:=_cl;
  51.     a6:=AmigaGuideBase; jsr [a6-72];
  52.     pop a6;
  53. endp;                                                            # AMIGAGUIDESIGNAL
  54.  
  55. pattern GetAmigaGuideMsg(_cl) is
  56.     push a6;
  57.     a0:=_cl;
  58.     a6:=AmigaGuideBase; jsr [a6-78];
  59.     pop a6;
  60. endp;                                                            # GETAMIGAGUIDEMSG
  61.  
  62. pattern ReplyAmigaGuideMsg(_amsg) is
  63.     push a6;
  64.     a0:=_amsg;
  65.     a6:=AmigaGuideBase; jsr [a6-84];
  66.     pop a6;
  67. endp;                                                            # REPLYAMIGAGUIDEMSG
  68.  
  69. pattern SetAmigaGuideContextA(_cl,_id,_attrs) is
  70.     push a6;
  71.     safe a0:=_cl; d0.l:=_id; d1.l:=_attrs;;
  72.     a6:=AmigaGuideBase; jsr [a6-90];
  73.     pop a6;
  74. endp;                                                            # SETAMIGAGUIDECONTEXTA
  75.  
  76. pattern SendAmigaGuideContextA(_cl,_attrs) is
  77.     push a6;
  78.     safe a0:=_cl; d0.l:=_attrs;;
  79.     a6:=AmigaGuideBase; jsr [a6-96];
  80.     pop a6;
  81. endp;                                                            # SENDAMIGAGUIDECONTEXTA
  82.  
  83. pattern SendAmigaGuideCmdA(_cl,_cmd,_attrs) is
  84.     push a6;
  85.     safe a0:=_cl; d0.l:=_cmd; d1.l:=_attrs;;
  86.     a6:=AmigaGuideBase; jsr [a6-102];
  87.     pop a6;
  88. endp;                                                            # SENDAMIGAGUIDECMDA
  89.  
  90. pattern SetAmigaGuideAttrsA(_cl,_attrs) is
  91.     push a6;
  92.     safe a0:=_cl; a1:=_attrs;;
  93.     a6:=AmigaGuideBase; jsr [a6-108];
  94.     pop a6;
  95. endp;                                                            # SETAMIGAGUIDEATTRSA
  96.  
  97. pattern GetAmigaGuideAttr(_tag,_cl,_storage) is
  98.     push a6;
  99.     safe d0.l:=_tag; a0:=_cl; a1:=_storage;;
  100.     a6:=AmigaGuideBase; jsr [a6-114];
  101.     pop a6;
  102. endp;                                                            # GETAMIGAGUIDEATTR
  103.  
  104. pattern amigaguidePrivate3 is
  105.     push a6;
  106.     a6:=AmigaGuideBase; jsr [a6-120];
  107.     pop a6;
  108. endp;                                                            # AMIGAGUIDEPRIVATE3
  109.  
  110. pattern LoadXRef(_lock,_name) is
  111.     push a6;
  112.     safe a0:=_lock; a1:=_name;;
  113.     a6:=AmigaGuideBase; jsr [a6-126];
  114.     pop a6;
  115. endp;                                                            # LOADXREF
  116.  
  117. pattern ExpungeXRef is
  118.     push a6;
  119.     a6:=AmigaGuideBase; jsr [a6-132];
  120.     pop a6;
  121. endp;                                                            # EXPUNGEXREF
  122.  
  123. pattern AddAmigaGuideHostA(_h,_name,_attrs) is
  124.     push a6;
  125.     safe a0:=_h; d0.l:=_name; a1:=_attrs;;
  126.     a6:=AmigaGuideBase; jsr [a6-138];
  127.     pop a6;
  128. endp;                                                            # ADDAMIGAGUIDEHOSTA
  129.  
  130. pattern RemoveAmigaGuideHostA(_hh,_attrs) is
  131.     push a6;
  132.     safe a0:=_hh; a1:=_attrs;;
  133.     a6:=AmigaGuideBase; jsr [a6-144];
  134.     pop a6;
  135. endp;                                                            # REMOVEAMIGAGUIDEHOSTA
  136.  
  137. pattern amigaguidePrivate4 is
  138.     push a6;
  139.     a6:=AmigaGuideBase; jsr [a6-150];
  140.     pop a6;
  141. endp;                                                            # AMIGAGUIDEPRIVATE4
  142.  
  143. pattern amigaguidePrivate5 is
  144.     push a6;
  145.     a6:=AmigaGuideBase; jsr [a6-156];
  146.     pop a6;
  147. endp;                                                            # AMIGAGUIDEPRIVATE5
  148.  
  149. pattern amigaguidePrivate6 is
  150.     push a6;
  151.     a6:=AmigaGuideBase; jsr [a6-162];
  152.     pop a6;
  153. endp;                                                            # AMIGAGUIDEPRIVATE6
  154.  
  155. pattern amigaguidePrivate7 is
  156.     push a6;
  157.     a6:=AmigaGuideBase; jsr [a6-168];
  158.     pop a6;
  159. endp;                                                            # AMIGAGUIDEPRIVATE7
  160.  
  161. pattern amigaguidePrivate8 is
  162.     push a6;
  163.     a6:=AmigaGuideBase; jsr [a6-174];
  164.     pop a6;
  165. endp;                                                            # AMIGAGUIDEPRIVATE8
  166.  
  167. pattern amigaguidePrivate9 is
  168.     push a6;
  169.     a6:=AmigaGuideBase; jsr [a6-180];
  170.     pop a6;
  171. endp;                                                            # AMIGAGUIDEPRIVATE9
  172.  
  173. pattern amigaguidePrivate10 is
  174.     push a6;
  175.     a6:=AmigaGuideBase; jsr [a6-186];
  176.     pop a6;
  177. endp;                                                            # AMIGAGUIDEPRIVATE10
  178.  
  179. pattern amigaguidePrivate11 is
  180.     push a6;
  181.     a6:=AmigaGuideBase; jsr [a6-192];
  182.     pop a6;
  183. endp;                                                            # AMIGAGUIDEPRIVATE11
  184.  
  185. pattern amigaguidePrivate12 is
  186.     push a6;
  187.     a6:=AmigaGuideBase; jsr [a6-198];
  188.     pop a6;
  189. endp;                                                            # AMIGAGUIDEPRIVATE12
  190.  
  191. pattern amigaguidePrivate13 is
  192.     push a6;
  193.     a6:=AmigaGuideBase; jsr [a6-204];
  194.     pop a6;
  195. endp;                                                            # AMIGAGUIDEPRIVATE13
  196.  
  197. pattern GetAmigaGuideString(_id) is
  198.     push a6;
  199.     d0.l:=_id;
  200.     a6:=AmigaGuideBase; jsr [a6-210];
  201.     pop a6;
  202. endp;                                                            # GETAMIGAGUIDESTRING
  203.  
  204.